home *** CD-ROM | disk | FTP | other *** search
- unit InterruptDisableLib;
-
- (*
- File: InterruptDisableLib.p
-
- Contains: Routines for disabling interrupts on 68K and PPC.
-
- Written by: Quinn "The Eskimo!"
-
- Copyright: © 1998 by Apple Computer, Inc., all rights reserved.
-
- Change History (most recent first):
-
- You may incorporate this sample code into your applications without
- restriction, though the sample code has been provided "AS IS" and the
- responsibility for its operation is 100% yours. However, what you are
- not permitted to do is to redistribute the source as "DSC Sample Code"
- after having made changes. If you're going to re-distribute the source,
- we require that you make it clear in the source that the code was
- descended from Apple Sample Code, but that you've made changes.
- *)
-
- interface
-
- uses
- Types;
-
- function GetInterruptMask : UInt16;
- (* See comments in C header file. *)
-
- function SetInterruptMask(newMask : UInt16) : UInt16;
- (* See comments in C header file. *)
-
- end. (* InterruptDisableLib *)
-
-